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SOME SPECIAL PROGRAMS FOR SCHOOLBMhnuvz 


We have a sPecial emPhasis for the September issue of the RAINBOW. 
Its on “Back To School." 


For this issue, we have a couPle of test Programs we think might 
convince the non-comPuter PeoPle іп your house that а comPuter is а 
worthwhile investment. Because there is some difference between them, 
we're g9goin9 to Present both and let you take your choice of which soy 
Prefer. 


There is also а Program called "Grader" which would be Perfect for 
anyone who із а tescher and needs to make resulsr reports on students. If 
the other half of your family has to sPend hours and hours addins up 
@rades, takin? averages, and then dividing to assien Percenta9es to 
different tyPes of Grades (such as homework and tests», this should really 
convince her Cor him». 


We hope vou like this month's edition of the RAINBOW and, if vou. do, 
4111 tell your COLOR ComPuter friends about us. 


GET REA“ TO DO BATTLE NEAR LASER STAR 


Get out those joysticks sand see whether you can become a Srace Fleet 
Commander while battling at the LASER STAR. 


This Program is brought to you through the Good offices of JARB 
Software. And, for anyone who doesn't want to tyPe it in himself, you can 
send £14.9% to JARB (1169 Florida St., Imperial Beach, СА, 920322 for а 
cassette COPY. Add $1 for Postage and vou will get this tape, Plus another 
Game, Helo Battle. Helo Battle will aPPear in listings form in next month's 
issue of the RRINBOH. 


LASER STAR is s» two-P layer Same which allows both Players to manuever 
their resPective sPacecraft -- a rocket shiP and a saucer. The obJect is 
tn destroy your foe enough times to advance in rank and win the battle. 


Its not all that easy, though. While you are fightin? there is an 
alien asteroid control station which fires a powerful laser at sPace dust, 


ССОМТІММЕО ON РАСЕ 11) 


. RN IMPORTRNT ISSUE... 


SOFTWARE THEFT 


Although most ОҒ us are 
consumers -- rather than authors =-= 
of software, the RAINBOW believes 
there are some imPortant issues 
relating to software that bear 
consideration of everyone who is 
interested in comPuters and comPuter 
Programs. 


One of the main issues, to our 
mind, 45 that of software theft. 
Some реор1е, we sre sure, call it 
"euaPPin9" or “trading,” Programs. 
Put such activities are theft 
nonetheless. 


One of the attractions of 
Publications such as the RAINBOW 14 
іп the Programs it Publishes. This, 
we feel. is especially true of the 
PAINBOU, since every Program in our 
Publication is written for the COLOR 


ComPuter ... and only the COLOR 
ComPuter. Many of our readers have 
told us this is one of the main i 
reasons they like the RAINBOL) so 
much. : 
Fless 
notice in each iss! 
statina that Purchase of our 
neyuslettenr entitles sou to use any 
Program retroduced on these Pages. 
Eut. you also are authorized only as 
the "sinale end user" --- which 
means yo are the only one 


authorized to use these Programs. 


Why? The answer is simPle' 2. 
number of aur Programs come from 
aoftuare authors who are willing to 
ehare some of their offerings with 
readers of the RAINBOW. But, 
they’re in business ... and these 
same Programe which you can get for 
free here will be sold to others. 
It is unfair to them for you to сор» 
their Programs and 9ive them to 
nen-eu4bscn 


As those of you who write any 
of your own Programs know, it takes 
weeks == and mans times months == to 
Cevelobo &n effective Program. 
That’s time invested. And, for a 
software author, time is money. 
Sometimes thousands and thousands of 
dollars. 


We nope you. won't Share, Sell, 
trade or swap Programs in the 
RAINBOW with non-subscribers. After 


alls a subscriPtion to the RAINBOW 
costs only $12. fid most of the 
ProSrame in the RAINBOW will retail 
for at least that much. That’s a. 
bargain for a subscriber, and ә 
ripoff by those who freeload off 
vour subseription. 


part of ә 
of software 
can reduce 
90oin9 ‘in’ 
and buying a 


This is, really, 
larger issue -- that 
theft. Certainly you 
your software costs by 
with a couPle of others 
Program. Or, yon 
someone else -- and 9et 
for the Price of one. 


two Programs 


Let's consider, though, the 
author 
and  debueging. that Program. You, 


cheat him out 
his Personal investment in time with 
every Qives. 


frankly, if he doesn’t make enough 
money sellina software, he'll sure 
be reluctant to spend his time 


writing another one. 
The author loses, but ус, lose, 

too. Because he Just 

write that one Great Program 

really want. 


you. 


The RAINBOW is against зоги зге 
theft == and make no mists 


trades and the like are theft. We 
strongly discourage you 
activities and hore your will 
actively discourage others as 
well. 

Its only fair. And its the 
only legal way, too. 

CORRECTION 

In the screen Printer article 
last month, the listin9 left out a 
semicolon in Line 50 after the СО), 


that is, at the end of the line. 
The correct Line 50 should resd 
as follows: 


Se PRINT4-2,CHR$(CQ», 


Our thanks to Al 


Morgan 
this find. 


for 


|: SOFTWARE REVIEW... 
WORD PROCESSOR 


TEXT EDITOR 


I have to wonder whether John 
Масло, the author of the COLOR 
ComPuter TEXT EDITOR/WORD PROCESSOR 
із а Psychic or Just an excellent 
Programmer. 


Frankly, the tyPesetter for the 
RAINBOW was a bit red-faced to see 
all the tyPos in last month’s issue. 
1 9uess that comes from having a 
secretary do all the real work at 
work | 


Anyway, within days after 
RAINBOW #2 came out, John’s TEXT 
EDITOR/HORD PROCESSOR arrived for 
review. And, if you see a 
significant improvement in the 
number ОҒ tyPos in this month’s 
issue, you can thank John. 


This Program т o from 
Мас16, Вох 11224, 

EXT se for 
aWIPPin9 a and handling? is absolutely 
excellent! It does everything . you 
could ask a word Processor to do -- 
and it does it extremely well. 
Anyone who wants to do any writing 
with his COLOR Computer will find 
the Price of the TEXT EDITOR“WORD 
PROCESSOR well worth the money. 


Moreover, I believe you will 
find the suPPort to be excellent. 
We did have a little trouble 9etting 
the form-feed C!!!) to work with a 
LP VII, but John had an answer 
within 12 hours. Now that’s 
£uPPonrt. 


First, ме”11 deal with the 16K 
version of the TEXT EDITOR^WORO 
PROCESSOR, and then exPlain a little 
ahout the very Powerful enhancements 
for 32K. 


You can inPut 200 screen lines 
of coPy in a free-form format. What 
that simPly means is that there’s no 
hassle about doing it. Just sit 
down and start tyPing. Anything you 
tyPe can be saved от taPe. And, as 
an added feature, you can заме Part 
of an item on taPe, load it back in, 
and then tyPe іп more material 


direct from the keyboard. Or, you 
can combine two Cor more) taPe 
saves. Its real easy. 


At any time, you can "escaPe" 
from the inPut area and enter the 
text editor. And, you can JumP back 
and forth at will. In addition, vou 
can Just “park” the whole thind, 
which leaves a message on the screen 
saying that the Program is ЧР and 
ruming. 


You can also check to see how 
many lines and characters are left 
in the free memory, and you can 
scroll through the text. You can 
also disPlay a line at a time. 


With the editor, you can 
delete, insert or edit any line of 
text. And, there is a very Powerful 
"find" command that lets you search 
the whole text for any word. It 
finds each reference to а word оғ 
Phrase. There і also а scan for 
section headings or endings -- which 
works very Guickiy in 16K. 


From the direct keyboard inPut, 
you. сәл tab over with one key -- and 
you can center lines with one key. 


If all that isn’t enoush, you 
are able to Print out a draft of 
мои” СОРУ ... with the lines 
numbered for easy editing. If you 
want only s Partial draft, that is 
Possible, too! 


Once созу із inPut, you are 
resdy to outPut, and the WORD 
PROCESSORYTEXT EDITOR 9ives you A 
vide range of oPtions there, too. 


You can set your right-hand or 
left-hand margin, decide on line 
spacing Caingle, double or 
triPle),set uP a form-feed so you 
don’t have to worry about Positins 
the coPy on Paper, Радітате, make uP 
to 50 coPies of the same thing, and 
right-hand Justify text! 


For those of you with 32K Cand 
1 urge you. to Set it), there are 500 
screen lines available -- and John 
is working to extend that to 650. 
But, if wou think 200 lines is too 
short, I think you would be 
interested to know that I have used 
Only 178 screen lines to S9et this 


CONTINUED 


PROCESSOR ccont"cd2» 


| 


In other words, 200 
Five hundred 1s 


entire review. 
is Quite a bit. 
somethin? else. 


But so are the other features 
of the 32K version... 


Additional commands include 
“моме г." which allows you to transfer 
tlocks of text from one Part of the 
СОРУ to another. "Сору" works much 
the same way, excePt 1% duPlicates 
text == leavin9 the original in its 
Place and adding another соғу in а 
new location. There is also a block 
delete command that allows you to 
delete whole batches of coPy at 
once. 


But, the real beauty of the 32K 
version is its word Processing 
ability. This allows you to use a 
variable text concePt to insert 
variable information at designated 
Places in the text. For a letter, 
ell vou have to do is insert a 
single control character for the 
name, address, city-state-ziP and 
the salutation after "Dear". Then, 
build a variable file with different 
names and so forth. 


Once vou have done that, yonu 
man write a letter, use both the 
text and variable files, and have 
the same -- Personalized -- letter 
90ine to a whole bunch of PeoPle. 
Keyboard work after building the 
file and writing the letter? One 
command ! 


Best of all, you can save the 
variable file to taPe and use it 
a9sin with а different series of 
letters. Үо) can also edit the 
variable file in the same way you 
Can edit text. 


If, from reading this review 
vou Set the idea I ат enthuiastic 
about John Waclo’s TEXT EDITOR/WORD 
PROCESSOR, you are right. 1 ап 
confident you will aree once you 
gee it. 


TEACHERS HELPER 


STUDENTS FRIEND 


For the teacher amongst us, 
GRADER can be a real boon! 


Hovever, we would also 
emPhasize that GRADER can easily be 
adaPted for keeping ор to date 
records on a single student. By 
using GRADER, the student would be 
able to chart his or her Pro9ress 
throughout а Sradin®e Period and know 
where he stands at all times. Its 
also a 900d мау for Parents to keep 
track of how a student is doing. 


We will 90 thoush GRADER Part 
by Part so it will be easier to 
adapt it, 1f necessary. 


Lines 10-25 initiate the 
Program and ask fon the tyPe rade 
you will be comPiling. Because, in 
our use, the reading9 rade only has 
daily avenreges, we wrote а өресіз1 
routine for readings Srades st lines 
600-780. This could be your whole 
Program if all @rades are weis9hted 
the same. 


Lines 60-110 and 120-180 do the 
actual comPutation of Grades. Since 
this Particular Program was written 
for third 9rade level, there are a 
lot of children who make 10074, 


esPecially on daily work. To 
eliminate the tedium of entering all 
those 100'5, we added the 


subroutines 340-380 and 390-430 to 
make the inPuttin9 of 100's much 
easier. This really cuts down on 
the time it takes to enter the 
Grades. 


We chose to enter the Srades as 
a strina and then take the value of 
the string so we could assign the 
word "end" to break out of the grade 
inout looP. While it would have 
been Just as easy to use somethin? 
like "IF 52150 GOTO 110" and then 
use any real hi9h number, it seemed 
easier to use an easilvy-reco9nized 
word to break out of the loop. 


CONT INUED 


. 9vades is made. 


: work two-thirds. 


Please also note lines 70 ате 
140. These take care of mistakes. 
If an incorrect rade із entered, 
Just enter the incorrect 9rade again 
as а minus. That not only reduces 
the total by the incorrect number, 
it also reduces the number of 
"chances" by one. 


Lines 110 and .180 take the 
average of the tyPes of grades. 


Line 190 18 where the 
allocation of weight to the tyPes of 
In this instance, 
tests sre worth one-third and daily 
These Percentages 
are easily changed to meet whatever 
needs you have. 


The remainder of the Program is 
Cevoted to the Printout. Quite a 
bit of attention was Paid to this 


because. in the situation for which 
it was written, a 9reat many 
students are "traded" for either 
enriched or remedial work. The 


KKK KC KC KK KC KCK KK N KCK KKK KC KCK KK KK 
° x GRADER 2.1 x 
^ x (c? FRLSOFT 1981 x 
7 Xoootokootoroxorororototorororotorotototorototok 
О PUS=" GRADE" 


20 INPUT "SUBJECT"jUP$'SB$sUP$«PUS 
25 IF UPS="READING" THEN 600 


CLS 
40 INPUT 


"STUDENT^S NAME") АЗ 


50 GOSUB340 


60 INPUT 


70 IF S#="END" THEN 110 
75 S=VALC S$ > 

eo IF S<@ GOTO 320 

90 NaN+1:DaS+D 

100 GOTO 60 

110 Z9D^N'CLS 

120 GOSUB390 


140 IF T$9"END" THEN 18 
145 TaVAL( TF) 


|50 IF T<@ GOTO 330 


162 М=М+1 :BaT+B 
170 GOTO 130 


80 YeB/M:CLS 


190 Kaç YX. 3342+ Zx. 666) 
200 CLS'PRINT 


20? LC=LC+1 
219 GOSUB460 
220 РКІНМТӨ-2,"" 


230 PRINT#-2, "DAILY AVERAGE 


CONTINUED 


' the Printout image statements, 


"enter DAILY SCORE COR END2"/S% 


INPUT "enter TEST 26068 COR ЕМО >", TS 


Printout, including the name, 
aubJect, number of "chances," total 
Points and number оғ 10074 
constitutes a full rePort to the 
atudent’s “home" teacher. It means 
Once the Grades ace comPuted, they 
do тос have to re-recorded 
elsewhere. 

Also, to make life easier, the 
Prosram is set to "formfeed" for a 


66-line Piece of Paper. This makes 
e whole report easier to deal 
with. 


There are certain economies 
which could have been emPlovyed to 
save memory sPace, Particulariy in 
but, 
since this Pro9nam fits very 
comfortably in ék, we did not see 
that as necessary. Of course, you 
need Extended Color Basic to use the 


PRINTUSING statement, but, if you do 
not have that, it is easily 
Convertable. ' 


The listing: 


IF LC»4 THEN PRINTé-2,"":PRINTS-2,"":LCe1:GOTO?210 


"j 3PRINTS-2,USING"44.40",2 


GRADER <Cont’a> 


240 PRINT#-2, "TEST AVERAGE "j (PRINT#—2, USING" #0. #6"; Y 
250 PRINT#—2, CHRE( 312; "GRADE AVERAGE "+ 'PRINTQ-e, USING" (V, 00" 5%! PRINT#=2, CHR$C3 


0» 

260 PRINTé-2," FOR YOUR INFORMATION..." 

270 PRINT«(-2,"":PRINT4-2,"DRILY PAPERS") :PRINT#-2, TABC 13 >) (PRINT#<2, USING" 44" ; N; 
‘PRINT@-2, TRBC18 2" POINTS" › | PRINT#—2, TABC 25 >: :РКІНТФ-2, USING" #,@#0" JD: 'PRINT#-2., T 
RBC2920" ê... (Student made"H"100’s on daily work >" 

280 VeN«M:;FeD«B 

290 PRINTé-2,"TOTRL TESTS") 'PRINT#—2, TRBC 132) (PRINT#—2, USING" #@") My :PRINT#—2, TAB 
€18>"POINTS") 'PRINT«-2, TABC 25 9) (PRINT#—2, USING'"@, #60" В: :PRINT#=-2, TABC 25 9" ..... 
(Student made"K"100's on tests >" 

308 PRINT4-2, "CHANCES" 'PRINT#—2, TABC 132) ‘(PRINT#-2, USING" ##")V) 'PRINT#-2, TREC18) 
"POINTS";:PRINTé-2, TABC 25 0) 3 PRINT&-2,USING "9,09%%";Е310 GOTO 440 

320 NzN-1:D»S«D':GOTO6O 

330 MeM-1:B»T-B'GOTO130 

340 INPUT "HOW MANY 100'S DID THIS STUDENT MAKE IN DAILY WORK" JH 

350 QsH*100 

360 Менен 

370 D»Q«D 

380 RETLIRN 

390 INPLIT "HOW MANY 10076 DID THIS STUDENT MAKE ON TESTS";K 

400 Qskx100 

410 MeM«kK 

420 BeQ«B 

430 RETURN 

440 PRINT#-2, STRINGSC 88, "¥" > 

445 PRINTS-2,CHR$C185""CHR$C30) 

450 PRINT#-2,"" 

460 Мао : Dag : 20:50. T=0: Ma0: Bs0: Ys0:X=0':Ys0: Fso: 0=0 : Каб 

470 GOTO39 

480 A=LENC SBF 2: C#42-R: PRINT#—2, CHR$? 31 >; TARCC/2)SB$ 

490 PRINT#—-2, CHRS¢ 3021 TABS 37 "FOR" 3 CHR£C 31 > 

той Аа ЕМА >: C#40-A' PRINT#-2, TABS C2 DAS) CHR £C 30 > 

$10 RETURN 

€09 CLS 

610 INPUT “STUDENT’S NAME" JAF 

€20 GOSLB340 

622 INPUT "enter DAILY SCORE COR ЕМО ›"; 56 

640 IF S#="END" THEN 689 

64% SsVRLCS$) 

ESM IF 5<0 THEN N9N-1'D»sS«D:GOTO630 

660 NaN+1 :D=S+D 

670 GOTO630 

680 Z=D/N' CLS 

692 606118480 

200 PRINT4-2,"" 

710 PRINT#-2, СНЕС 31 >; "GRADE AVERAGE "; »PRINT#-2, USING" #4. "2 

220 PRINT4-2,""CHR$(C30) 

720 PRINT#-2," FOR YOUR INFORMATION..." 

740 PRINT&-2, "":PRINTQS-2, "GRADES"; :PRINT4-2, TABC 13); : PRINTÉ-2, US ING" 8" JN; ‘PRINT 

#2, TABC 18 ›"РОІМТЅ" ; : PRIHT4-2, TABC 25 2) :PRINT#-2, USING" @, 444"; D; » PRINTS-2,TRBC 29) 
..... (Student made"H"100^s on daily work >" Ў 

750 М0 020: 2=0 '5=0 ' 020: Had 

2760 PRINT#-2, STRINGS. 80, "X" > 

770 PRINT#-2,"" 

280 6070600 


SOFTWARE REVIEW. . . 
so 


sseoc 
If you want to get into 
assembly language Programming, and 


there із little Question that many 
of you will at least to some degree, 
you need an assembler. 


Truth be it known, yon also 
should have an editor and a monitor 
to have & comPlete assembly language 
sustem. And, while these Programs 
can be Purchased separately, having 
them as a Part of one Package із а 
decided advantage. 


One of the Problems, of course, 
is that such Programs take uP a lot 
of memory. So, if you could have an 
assembler, editor and monitor all on 
a ROM Cart ~- using uP no internal 
memory == it would be a 9reat 
bonus. 


All of this is available in The 


MICROWORKS’ SOFTWARE DEVELOPMENT 
SYSTEM ¢SDS3@C >. 
This excellent Package 


Cavailable from The MICROWORKS for 


889,95, P.O. Box 1110, Del Mar, CA, 
92014) has the very major advantage 
of being written so that you can 


move back and forth between the 
elements ОҒ the 50580С at will. 
That means if you write a Program in 
assembly lanSuage with the editor, 
vou can then assemble it and run it 
and, vuhen Cor if) it crashes, 90 
back to the editor to make changes 
instantly. This makes for ease of 
debu991no. 


We'll discuss the three Parts 
of 50560С seParately to exPlain hov! 


they work in Greater detail. 
However, they are all interactive, 
$0 it is important to understand 


that you can move between them at 
anu Point to take advantage ОҒ any 
of the features as you need them. 


As usual with Programs from The 
MICROMORKS, the 50580С is sauPPorted 
b» vers comPlete documentation, 
And, to make things easy for the 
novice, there is а sample Pro9ram 
right at the be9innin9 -- to help 
vou 9et started and comfortable. 
There із also a brief description of 


6809 assembly language and six 
aPPendices to helP out. However, 
don’t think you can “learn" assembly 
language from this documentation. 
That's something a little too 
comPlicated even for a 41-Раде 
manual. There are several excellent 
books on the market, and a future 
issue of the RAINBOW will carry a 
comParative review ОҒ some of 
them. 


The $SDS8OC editor is screen 
oriented, with a Фор line that gives 
you. a running count of the amount of 
free memory available and another 
number telling you Just where in the 


Program you. are creating you are. 
This is extremely helPful іп moving 
text blocks. The top line also 


tells you what mode you are using. 


You can scroll through the 
entire file you create using the uP 
and down arrow keys. You can move 
the cursor right or left usin? those 
arrow keys. The ENTER Кен sends you 
to the next line and the Space key 
moves to the next character, or lets 
you SkiP blocks of sPaces. 


There are nominally 12 commands 
in the editor, but since some of 
them can be used with a minus sion 
to make them 90 backwards rather 
than forvards, there are a number of 
other oPtions. In addition, there 
is another command to call the 
assembler and still another to 
recover the file after а comPuter 


reset. This is very helPful if your 
Program crashes, you have to reset 
the comPuter, and want to do some 
more editing. 

The commands available are 
insert lines Cused for writing 
ProSrame as well as inserts), delete 


lines, exchange text, find a string, 
find and change a string, do 
find or chanze a9ain Cin effect, a 
9lobal find or change), 90 forward a 
Раде, copy text, move text, Jump to 
start or end, write file to taPe and 
read file from tape. The find 
string, find and change and 90 
forward will 90 either forward or 
hackward from the Point in the 
Program at which you are 
Positioned. 


CONTINUED 


last i 


SDSSeC <Cont’ds 


All these are simPle one-letter 
commands, which do not 
to ENTER them. This makes it very 
easy and allows you to concentrate 
on the Programming rather than the 
method of ProSrammins. 


Needless to say, some of these 
commands are extremely Powerful. 
EsPeciKlly consider the case of the 


find and change in connection with 
the "another" command. You can 
change a string ina file at each 
occurrance very Quickly with this 
combination. 

Once you have a Program 
written, «ou can call the assembler 
simPlu by Pressing one Ке». That 


will make the ProSram take your 
mnemonics and Produce obJect code. 
The code will be written either to 
taPe or to the comPuter’s memors. 


The 60589С assembler will 
suPPOort all standard instructions, 
address modes and mnemonics. 


Additionally, is will cross-assemble 
6800 instructions (!), allow use of 
local labels, Provide for 
Conditional assembly and has a 
listine control feature. 


There are also nine options on 
how to assemble. Again, these are 
single letters, but thes are entered 
together and in any order. The most 
simPle is "L", which Produces a 
listine. You can also choose a 
sorted symbol table, send the 
assembled object code to memory or 
сәре, start the listings in 
einale-step mode and send outPut to 
32, 40 or 80 column Printers. Яз a 
final oPtion, you can choose not to 
assemble, merely to 90 directly to 
the monitor Pro9nram. 


The assembler generates 13 
distinct error messages. These will 
tell vou what might have Sone wrons. 
Whenever an error messa9e occurs, 
the assembler automatically enters 
einale-steP mode. However, you can 
90 to sin9le-steP mode at ans time. 
You can also Pause the listino, 
sPeed it JP or slow it down or BREAK 
it. 76 you are writing to taPe, a 
BRERK will close your oPen taPe 
outPut. 


If you choose to assemble а 


require you | 


Program to memory, you are 
automatically transferred to the 
monitor when assembly is complete, 


The 50580С Monitor, called 
RBUG, is ә special version ОҒ The 
MICROWORKS’ CBUG which was reviewed 
іт RAINBOW 42. However, ABUG has 
been tailored sPecifically for use 
with the editor and assembler in 
6р580С. 


There ere 11 commands іп ABUG, 
which will allow you. to execute the 
Program you. have written and 
assembled, examine and chanse the 
memory, disPlay the register list, 
transfer blocks of memory, Jump to 
machine lanSuase subroutines, change 
Contents of the resisters on the 
$tack, save or losd obJect code to 
or from taper reset the stack 
Pointer and return to thr editor. 
You сат also evaluate exPressions == 
which not only converts decimal to 
hexidecimal duickly, but alzo will 
Print values of symbols and do 
hexidecimal calculations! 


The documentation is chock full 
of informstion on assembly  lan9usse 
and is ғ 9rest source of information 
in itself. It is written well, not 
too technical -~ but not too 
simPlistically, either. 


We want to emPhasize two maJor 
advantages of having the 505807 on a 
ROM Cart. First of all, it saves a 
lat ef time in loading, which is, 
obviously, а very lon9 Program. But 
second, and even more important, it 
frees uP all your memory for use by 
sour Pro9nam. That is a bonus in 
itself, but it also means you don’t 
have to worry about where you Put 
your omm Program -- because it can’t 
“nun into" the SDS80C. 
course, like the 1/0 which is above 
sFEFF. 


We believe The MICROWORKS has 
an excellent software development 
package in SDSSOC. While it is an 
exPensive Piece of software, it is 
really all you need Cother than a 
Qood book? to set right into 
assembly language. And it has the 
advantage of being Perfectly mated 
to its various elements. 


SDS80C is a Sood buy. 


(You do have. 
to stay out of certain areas, Of 


ARE YOU PSYCHOTIC. .. UR., UH. » - PSYCHIC? 


The followin? ProSram (PAT) із brou9ht to you courtesy of  JRRB 


Software. It is a Psychic Aptitude Test in format, and is a lot of fun to 
see how Psychic you might be. 


Note that by comParison to 0012, the Program itself is Pretty short .. 


from lines 10 to 290, and a Sreat deal of that is instruction. 


You. should also note that this one із more 9ee-uhiz than is QUIZ. It 


emP loys the use of sounds and colors to a Sreater degree than does QUIZ. 
That certainly will make it more appealing to younger test-takers. 


PAT із easily adaPtable to other uses, Particularly school review. 1% 


does re3uire that the student 90 through from start to finish, but more 
than makes uP for it by the colors and sounds. 


For those of you who do not want to tyPe іп the ProSram Cand then 


debue the tyPos), PAT can be ordered from JARB Software, 1169 Florida St., 
ImPerial Beach, СА 92032 for $14.95 Plus $1 for shiPPin9. You'll Jet a 
bonus, though, a соғу of JARB BIORHYTHM included оп the same taPe. 
Although JRRB chief Programmer Joe Bennett Promises us а copy of JARB 
BIORHYTHM for a future issue of the RAINBOW, its а lon Program and he 
emPhasizes the bargain in sendin off for the (аре. 


The PAT listing: 


1 '"* x KKK KKK KK KKKE XK 
e X PSYCHIC APTITUDE TEST ж 
3 ’* BY ¥ 
4 “Ж JARB SOFTWARE x 
5 %ж CC) JARB SOFTWARE 1961 x 
6 'X X X * X X * X X * * ХХХ 


19 CLERR10QG0:CLS:R20: Баб 
20 FORI«1TO108: CLSRND« 82 
Зӣ PRINTG229," PSYCHIC APTITUDE TEST ";:'PRINTG270," BY "j'PRINTG297?," JARE SOFTW 


RRE 


"i 


40 SOUND100-«I,1:NEXTI 

50 CLSO:PRINTOG230,"CC) JARB SOFTWARE 1981"; 'FORI*1TO2S'SOLINDIX2,1:SOLINDIX3, 1:SOL 
NDIX10,1:NEXTI 

€0 CLS:PRINTG128,"INSTRUCTIONS:":PRINT" QUESTIONS WILL BE ASKED OF YOU.";'PRINT" 
ANSWER THESE AS HONESTLY AS YOU": 

ANSWERED, YOU WILL RECEIVE YOUR":PRINT"FINRL SCORE AND EVALUATION." 

20 PRINT" THAT’S ALL THERE IS TO IT. "j:PRINT"HRVEFUN, AND PRESS <ENTER> TO ";:P 
RINT"BEGIN THE TEST." 

82 SQUND120,4:SQUHD130,4:S0UND150, 4: SOLIND130, 4: AFeINKEY$: IFR$a""THENBOELSESO 

94 SOUNDGSO.2:CLSRND(C8 2: 5004090,2 CLSRNDC8 2: SOUND100, Z: CLSRNDCB >: SOUND110, 12: CLS 


109 
118 
120 
130 
140 
150 
160 
170 
184 
190 
200 


A=A+1 : READAS, В+, C$: IFR$u"END"THEN190 
CLSO:PRIHTGO,"THIS IS QUESTION #"A 
PRINTG64,R$£«-CHR$(€32: PRINT!PRINTB$*" | "jC$ 
INPUT"PLERSE CHOOSE ONE NUMBER"JB 
IFB&200RB»23THEN1 10 
IFB=1THENGOSIJB180ELSE170 

CLS: IFA=18THEN190ELSE1 70 

CLS : GOTOSO 

IFBei THENSC#SC+10' RETURN 

IF A218 THEN 5Св1М7((5СЖ10%11.1111%12/1002 
IFSCX25OTHENRR91110ELSEIFSC«»100THENRR* 120BELSE IFSC(»150 THENRR.S 130 SEL SEIFSC? 


т151ТНЕМНЕКв 1400 
210 CLS: PRINTTABC 12"YOUR FINAL SCORE IS" SC "POINTS" 


220 


PRINT =" 
CONTINIED | 


PSYCHIC «Cont^cd»o 


234 PRINTTRBC102"Q-50 POINTS":PRINT"MRY HAVE PSYCHIC POWERS WORK ON": PRINT" THEM 
TO INCREASE THEIR STRENGTH" 
240 PRINTTABC 10 9"51-108 POINTS"'PRINT"PSYCHIC POWERS ARE EVIDENT,MWORK" :PRINT"TO 
BRING THEM TO FULL FLOWER. " 
250 PRINTTABC 
"WERS." = 
260 PRINTTRBC102"151-200 POINTS": 1 

KNEW THAT ALREADY, RIGHT?" 

270 PRINT:PRINT"HOLD ENTER TO END"; 
280 POKERR*1,143'FORIsSOTO30: NEXT ' POKEAR=1, 95 'FORI=0T030' NEXT: POKEAR=1 , 143: FORI =0 
TO30' NEXT ' POKERR, 95: SOUND180, 1 'FORI#@TO3@: NEXT : POKERR, 143: FORISQTO3OQ : NEXT 'POKERR 
*1,99'FORISOTOSO:NEXT:2$e INKEY$f : IFZ$2""THEN28Q0 
290 CLS:PRINTG233,"JRRB SOFTWARE" 

зеп DATA “HAVE YOI! EVER BEEN THINKING ABOUT SOMEONE, AND UNEXPECTEDLY МЕТ TH 
EM"."1. YES","2. NO" Б 

310 DATA “WHILE GAMBLING. HAVE YOU EVER HAD WHAT YOU THOUGHT WAS A LUCKYHUNCH" 
,"1. УЕ5","2. NO" 

320 DATA "DID YOU EVER SAY THE SAME THING AS A FRIEND, AT THE SAME TIME","1. YES 
"y "2. NO" 
322 DATA “HAVE YOU EVER HAD THE EXPERIENCEOF THINKING OF A TOPIC, OR EVENTAND HR 
VE IT CONTINUALLY COME UP IN CONVERSATION, THE NEWS, OR INREADING MATERIAL WITHI 
N A 24 HR.PERIOD","1. YES","2. NO" 
34808 DATA “HAVE YOU EVER SHIVERED FOR NO APPARENT REASON AND THEN LATER  RECEIV 
ED BAD NEWS ABOUT AN EVENTTHRT TOOK PLACE RT THAT TIME","1. YES","2. NO" 
350 DATA "НАМЕ YOU EVER DREAMT ABOUT A PERSON, PLACE, OR THING, ONLY TOENCOUN 
TER IT AT A LATER DRTE","1. YES","2. NO" 


360 DATA "HAVE YNI EVER ENCOUNTERED A PERSON, PLACE. OR THING FOR THE FIRST 
TIME, АМО YET FELT THAT ҮС!) HAD SEEN IT BEFORE","1. YES","2. NO" 
370 DATA "HAVE YOU EVER HAD A STRONG THOUGHT POP INTO YOUR MIND, RPPRRE 


NTLY WITHOUT REASON, ONLY TO HAVE IT REPEATED BY SOMEONE DAYS OR WEEKS LATER SO 
THAT IT SUDDENLY MAKES SENSE TO YOU". "1. YES","2. NO" TT 

380 DATA "HAVE YOU EVER HAD A PREMONITION OF SOMETHING, NO MATTER HOW TRIVIA 
(, THAT LATER PROVED TO BECORRECT","1. YES","2. NO" 

Зэр DATA “HAVE YOU EVER BEEN ON SUCH A WINNING STREAK WHILE GAMBLING THAT Y 
011 WERE SURE YOU COULDN'T LOSE, AND YOU DION’T"."1. YES","2. NO" 

40% DATA “HAVE YOU EVER FELT THAT SOMEONE WAS STARING RT YOU, AND THEN TURNED 
AROUND TO FIND THAT IT WAS TRUE? OR DID YOU EVER TRY TOMENTALLY WILL SOMEONE 

TO LOOK UPOR TURN RROLIND, AND THEY DID","1. YES","2. NO" 

410 DATA "HAVE YOU EVER BEEN SO INVOLVED ІМ YOUR OWN THOUGHTS THAT YOL LOST A 
LL CONTACT WITH THE WORLD ONLY TO REALIZE AFTER SOME TIME THAT A FRIEND HAD BEEN 
TRYING ТО ATTRACT YOUR ATTENTION". "1. YES","2. NO" 

420 DATA "HAVE YOU EVER EXCHANGED GLANCES WITH A STRANGER AND EACH OF YOU KNEW E 

XRCTLY WHAT THE OTHER WAS THINKING AND FEELING","1. YES","2. NO" 

430 DATA "DO YOU APPEAR TO HAVE A -GREEN THUMB’. IN THAT YOU CAN SEEM ТӨ BE ABL 

E TO INFLUENCE THE GROWTH OF PLANTS WITH YOUR THOUGHTS","1. YES","2. NO" 

442 DATA "DO YOU HAVE A WAY WITH RNIMRLS","1. YES","2. NO" 

450 DATA. "АВЕ YOU AN ЕХТКОУЕКТ OR ARE YOU A INTROVERT","1. EXTROVERT", "2. INTROV 

ERT" = 

ace DATA "DO YOU HOLD A BELIEF IN E.S.P OROTHER PYSCHIC PHENOMENA", "1. YES", "2. 


^A DATA "ARE YOU HAPPY AND SATISFIED WITHLIFE IN GENERRL","1. YES","2. NO" 
485 DATA КТ END", " END "y " END" 


LASER STAR ссотъ 2 еі > 


meteoroids and asteroids. If the blast h 
1f wou collide with your oPPonent, El 
of like no-fault insurance). 


you lose Points. Also, 
one ОҒ you will also lose Points (sort 


There's another hitch, too, that can cause you 
we're not Goind to tell vou about it. Let's Just hint dps cnc 
sPace in your sector and can be very troublesome. You'll see! 


But 
it Paralizes 


The Joysticks control movement of the two sPace ships and the aiming 


Point of their lasers. They cannot shoot backwards, though. 
We think you will enJov Playing LASER STAR. 
The listing: A 


^"* X X X X X X X x x x x x 
“ж ж Ж LASER STAR Ж Ж 

^x BY 

‚ж JRRB SOFTWARE 

“Ж (CC) JARB SOFTWARE 1981 x r 

6 'X X X X X X X X X Xx x x Xx KK 

10 CLSQ:PRINTG230," Ж Ж LASER STAR ж ж ",'PRINTO2S2," (С) JARB SOFTWARE 1981 "; 
15 FORIS1TO10:FORIIS1TO10:SOUNDIXII*100,1:NEXTII, I' FORIS1TO6: PLRY"O1V3OTIGLGEEEE 
DDRRRREEEEDORRRR" : NEXTI 

20 CLERR190 

25 CLSO:PRINTG13S,"X x LASER STAR X Же; 

39 PRINT@224,STRINGSC 32,1289)  INPUT"ENTER МАМЕ OF PLAYER 4$1",2$:2$«" "+2%+" " 

35 INPUT"ENTER NAME ОҒ PLAYER %Я2";216:214ш" "42188" " 

40 PRINT"LONG GAME (15 OR SHORT САМЕ C22"; ' INPUTZ9' IF29X10R29»2THEN4SELSESO 

45 CLS:PRINTG224, "":GOTO40 

SQ 1Ғ29-1ТНЕМ29в10 

SS 1Ғ29-2ТНЕМ29-ш5 

SPRL LE 422:81:36,429: RRND ESR? BARNDE 101 >: BANDE PAR) ВАНОСТІ‏ یی MC‏ ت 


65 ҒОК1-07029 

70 ACT ®RNDC 255 2 BC I =RND( 1912 

75 NEXTI 

80 R£e"BM128,96H3F6H3USD10USE3GCE 3RSL10RS" 
85 PMODE4,1'PCLS'SCREEN1, 1 

90 DRRU"C1,BM1295,96R3L6U1D2" 

95 DRRW"BM128,1S58R3L3U1D2U1L3" 

100 GET. 120,902-(136,1022,81,0 

195 СЕТ 120,1522-(136,1662,81,6 

110 PCLS 

115 ReR*INTCJOYSTKCO 976. 32- S: BaB+ INTC JOYSTKC 1276, 32-5: R19814 INTC JOYSTKC2 2576, 35-9 
'B19B14 INTCIOYSTKC3276, 3275 

120 IFRX10THENRe1Q 

125 IFR1C«10THENR1910 

130 ІҒА>245ТНЕМАв245 

135 IFR1»24STHENR1«245 

140 IFB«10THENB*10 

145 ІҒВ1<1ӨТНЕМӘ1е10 

150 IFB»?181THENB*9181 

155 IFB1>161THENB1#161 

160 РОКІ =0Тт029 'РЗЕТСАСІ >), ВСІ? ›' МЕКТІ 
165 ORAWAS 

170 PUT(R-8,B-62-CR*8, B*65, R1, PSET 

175 PUTCR1-8,B1-62-(81*8, B1*62, B1, PSET 


(AAO N =» 


CONTINUED 


LASER STR C Cont’ g> 


180 R=RND( 75 >)'A3=0: B3eRND(C?O 2! C9SRNDC 102! IFR=37THENGOSUBS15 

185 HeRND(C2SS»: VeRND( 191) 

190 PLRY"V2OO0ST100L100RRRR" «PLRY"V39O0ST100L100BB" 'L INEC 128, 96 2=( Н, V) PSET'LINEC1 

28,965-CH, V2, PRESET 

195 IFPPOINTCR-1,B5900RPPOINTCR,B29QGORPPOINTCR*1,B)SOTHENHISIELSEH1«0 

200 IFPPOINTC81-1,B129QORPPOINT(CR1,B12eQORPPOINTCR1*41,B12eOTHENHZe1ELSEH2*0 

205 IFH1910RH2*"1THEN220 

210 LINEC128,965-CH, V >. PSET 'LINEC 126,96 9-C H,V >. PRESET 

215 КЕР coer eee serene perc G2) >21 27THENI ISELSE2OS 

229 IFH1< 28THENZ3S ae 

22% IFH2< >ӨТНЕН250 

239 6070115 

235 SisSi-1 

240 E1«eR:E2»B 

245 6070265 

250 52-52-1 

255 EIeR1'E29801 

260 6070265 

- 265 LINEK 128,96 -CH У >, PSET' LINEC 126, 96 -=C H, V), PRESET 

eve CLE FORI@1T010'SCREENO. 1'FORII@1T010'NEXTII'SCREENI, 1 FORIIe1TO10: NEXTII'NEX 

272 EeRNOC105'FORIS1TO10*E'CIRCLECE1,E22, I, 1 PLRY"O1V3OT100L100DROR" : NEXTI'FORI&S 

1TO10*E:CIRCLECE1,E25, 1, OQ: NEXTI 

288 GOTO420 

285 Ci@PEEK< 65268 > 

290 IFC191260RC19254THEH310 

29% IFC1912SO0RC1s253THEN340 

300 IFC191240RC1-2S2THEN37?Q0 

305 6070115 

310 LINECA+3, B>- 235, JOYSTKC 1 2X 322, PSET'LINECR*S,B2-C2S5, C JOYSTKC 1 9&3 > >, PRESET ' 
PLRY"OS'/30T100L100BBV2OCBV10BBV30BB" 

315 IFPPOINTCR1*1,B12590DRPPOINTCR1,B1259QO0RPPOINTCR1—1,B159OTHENS32S 

320 LINECR*S,B5-C2S95, C JOYSTKC 1 94399, PSET' LINECR*S,B5-C29S, C JOYSTKC 12x32 >, PRESET: 

5070115 

325 LINECR*S,B5-C255, C JOYSTKC 1 2X3)», PSET'LINECR*S,B5-C29S5, C ЈОҮЅТК 12Ж322,РКЕЗЕТ 

330 E9RNDC105'FORIe1TO10*E: CIRCLECR1,B12, I, 1 PLRAY"O1V3OT100L100DDDD" : МЕХТІ 'РОКІ= 
1TO10*E'CIRCLECR1, B15, I, Q: NEXTI'S19S141 

335 GOTO420 

340 LIHECR1-5$,B15-CO, CJOYSTK(C 3 2X > >, PSET'LINECR1-$, B12-COQ, C JOYSTKC 3 9&3 > >, PRESET: 

PLRY"OSV3OT1Q00L100DDV2ODDV1ODDV30ODD" 

349 IFPPOINTCR-1,B590O0RPPOINTCR,B29SQORPPOINTCR-*1,B2sOTHEN3SS 

Hos LINECR1-$,B125-CO,CJOYSTKC 3 x3) >, PSET'LINECR1-9,B12-CQ, C JOYSTKC 39%3 >>, PRESET : 
070115 

355 LINECR1-9,B125-CO,CJOYSTK( 39x39 >, PSET'LINECR1-5,B12-C0,C JOYSTKC3 X3 22, PRESET 
360 E@RNDC 10 > ' FORI@1TO20+E ‘CIRCLES A, BD, I, 1? PLRY"O1V30OT100L100DDDD"  NEXTI : FORI@1T 

O20+E 'CIRCLECA,.B>,1,0'NEXTI'S2=eS2+1 

365 GOTO420 

370 LIHECR«S5,B5-C255,C JOYSTKC 1 9X 32», PSET' LINECR1-5,B12-CO, C JOYSTKC 3 9&3 >>, PSET:LI 

NEC R*S5,B5-C2S9, C JOYSTKC 1 9&3 >>), PRESET'LINECR1-5,B12-C0, C JOYSTKC 3 9&3 >>, PRESET ' PLAY 
"O*V38T100L100BBDDV2OEBDDV 1 OBBDDV3OBBDD" 

375 IFPPOINTCR-1,B?*PPOIHTCR, В O+PPOINTC A+ 1, B >< >1 SANDPPOINTC AL— 2 B15*PPOIHTCR1,B1 
»*PPOINTCRI*1,BiX15THEN3SS 

380 IFPPOINTCR-1,B59QORPPOINTCR,B59SOORPPOINTCR*1,B29OTHEN410 

385 IFPPOINTCR141,B12900RPPOINTCR1,B129QO0RPPOINTCR1-1,B1259OTHEN419S 

399 LINES R*5,B5-C2935,C JOYSTKC 1 9&3 >, PSET'LINECR1-5,B15-CO, C JOYSTKC 3 9&3 >>, PSET'LI 
НЕСВҒ5:89-<238,20Ү6ТҚ124322:РКЕБЕТПАНЕН IERI ЛЕР CODE mae MEA резне RE. 
1 


= LINE? A+5, В ›- 253, C JOYSTKC 1 9&3 > >, PRESET' LINECR1-5,B12-CO, CJOYSTKC 3 9&3 > >, PRESE 


400 EeRNDC102'FORIS1TOI10*E' CIRCLECA.B>,.1,1'CIRCLECA1,B1 >, I, 1 PLRY"O1V30T100L100D 
D" :NEXTI'FORIS1TO10*E: CIRCLECR, B2, I, Q'CIRCLECR1, B1), I, OQ'NEXTI'S19S1-1:S2-S2-1 


CONT INUED 


Laser Star CCont^"cd2» 


405 GOTO115 

. 419 LINECR«*S,B2-C295,C JOYSTKC 1 K3 9, PRESET 'GOTO355 

415 LINECR1-5,B15-CO, C JOYSTKC 39%3 >>. PRESET 'GOTO325 

420 IFS1>#29 ORS2>#29 THENS2S5ELSE115 

425 51=51ж10'52=52%10 

430 IFS1»8O0THENR1$9'"XSPRCE FLEET COMMANDER" 

435 IFS1Xz80RNDS1»60THEHNR1$9"XSQURORON COMMRNDERX" 

440 IFS14960RHDS1»30THENR1$»"XFLIGHT COMMANDER" 

445 IFS1X930THENR1$»s"XFLIGHT CRPTRINX" 

450 IFSe»BOTHENR2$*"XSPRCE FLEET COMMRNOERX" 

455 IFS2480RNDS2»60THEHR2$ 9" XSQUIRORON COMMANDERX" 

460 IFS2X60RNDS2»30THENR2$»"XFLIGHT СОММЯМОЕКЖ" 

465 IFSeX30THENR2$9"XFLIGHT CRPTRINX" 

470 IF S19S2 THEN 475 ELSE 480 

475 R1$9"NO AOVANCEMENT--DRAW ":R2$9"NO RDVRNCEMENT--DRRH " 

480 SCREENO,1'CLSO:PRIHTG10," FINAL SCORES "; 

485 PRINTG64+¢ 167€ INTCLENC2$2/2 222, Z$) 'PRINT8128, "RANK 15. "«R1$; 'PRINT@165, “YOU 
R FINAL SCORE 15";51 

490 PRINT@224+¢ 16-CINTCLENC 2180/2222, 218) + PRINTG280, "RANK IS: "4R2$,'PRINTG325," 
YOUR FINAL SCORE IS";S2) 

495 PRINTG383,"THRNK YOJ FOR PLAYING") 'PRINT@422, "x Ж LRSER STAR Ж X"; 

500 PRINT@453,"PRESS <E> KEY TO END") 

505 2$91NKEY$'IF2$«»"E"THENSOS 

510 CLS:END 

515 RSs»"EU4! 2G3D3F3D1E4LI3E3L2" | R3983«5: B39B3«RND(C 10?! C9@C9+1 : IFC9» 25 THENS30 
520 АНаАН+1 : ІРАНУЗТНЕМАН ад 

525 ORAW"A"+STRECAN A+"; "+"C15BM"+STR#C AS +", " *STRSCB32 4RS$ 'ORAW"A"+STREC AN +" "е 
"CO; BM"«STR$CR25«","«STRSCB3O«*RSS:GOTOS13 

530 PLRY"OST1O0OLSA4EDFFEEEE" : DRRW"C1" 'CLS: LINEC128, 9620-C R3, B3», PSET'FORIS1TOSO:NE 
MTI:FORIS1TO10:SCREENO, 1! FORIIS1TO10:NEXTII'SCREEN1,1:FORII91TO10:NEXTII:NEMTI 
531 LINEC128,962-CR3, B3»), PRESET 

$35 DRRW"R"«STR£CRHNO*";CI; BM" +STR#CAZ +", "4STREC B3 >+AS# 'FORIS2TOSOSTEP2: CIRCLECA 
3,.B3>,1,1:PLAY"01T2B0L64AREBBREBEREBB" ' МЕХТІ 'FORI#30TO2STEP-2 :CIRCLECAS.B35,1,0:N 
EXTI:S1z21-1:S$2292-1:C920: DRRU"C1" : RETURH 


det-line із rePeated. You will also 


GRAPHICS PRINTER have to change the second CHR$(3) in 
the same line to the value of the 
As Part of our Continuing first so that the sPaces and 
efforts to he lP with Printer "blocks" match. 
utilities, here is a screen Printer 
for low-res 9raPhics using the COLOR “Неге is the short ProSram: 


ComPuter and the LP VII. 
10 FOR X=0 TO 127 


This same logic will work with 11 FOR Y=@ TO 63 
other Printers, too. It is a little 12 IF POINT (Y,X? THEN 
comPlicated with the LP VII because PRINTM-2, СНК 18)CHREC 28) 
of the dot matrix 9rePhics, as BNE Cure: ы 
oPPosed to Plain 9raPhics JNT$-2, СНК 18 DCHRE< 28 > 
characters. СНЕС 3>СНК4< 128), 

13 NEXT Y : 

If you want a fatter or thinner 14 PRINT#—-2, CHRSC 18) 
single 9raPhics "block," Just change 15 NEXT X 
the first CHRS¢3> in Line 12 to 
another number. This number = | | | | | --7---2----- 


Controls the number of times the 


MAKE YOUR KIDS LIKE THE QUIZ KIDS 


The "QUIZ" ProSram listed below 
was written by FRLSOFT for use in 
PreParing schoolchildren for tests. 
Its Primary aim was to make it easy 
to enter questions and ansvers. 


One of the main advantages of 
this Program is that it 
automatically counts the number of 
data statements, thus eliminating 
the need to set any Parameters, 
This із Primarily true in line 400, 
which insures that the student 
cannot memorize the order of the 
answers. because the ProSram selects 


Yeu can see how this situation is 
°` handled in line 601. We didn't do 
1t for ever» line, simPly because 


we’re sure you will have your own 
sets of Questions and ansuers. 


This does work and is fun for 
the kids. In fact, this ProSram 
helPed one youngster in Kentucky 
raise her 9rade in one course by two 
letters in six weeks! And, tywPing 
data statements was a lot easier 
than sitting down and drilling the 
student over and over. The student 
also has the advantage of deciding 


on з short or a long session, and 
there is а test "report card" at the 
end. If you want to check your 
Student. ' 

statements in line 550 and you'll 


the questions at random. 


It is important to remember · 
that most questions can be asked tuo 


ways. Note line 601: Тһе question 
there is "Capital of Kentucky?" and ee а record of how the sessions 
the answer is "Frankfort." But, in went. 


many Cases, ә. teacher might ask the 
auestion "backwards," or ask "What 
$tate is Frankfort the caPital of?" 


The listing is below: 


A 0825529554996 KKK KKK KK KK 
ж 12 


3 ғ 

4; ل‎ x 

u^ x ADAPTED FOR COLOR Ж 

62" x COMPUTER Ж 

ғ x BY FALSOFT ж 

gt CAO اک کک کک اک کج کک ج کک کک کک کک و‎ OK 

10 CLS'PRINT: INPIJT"CENTER> YOUR NAME" J NAS 

20 FOR 22-1 TO 1000'RERD Q$:IF Q$e"ENO" THEN 30 ELSE Y=Y+1:READ R$:NEXT 
30 CLS'PRINT'PRINT" HELLO, "NR$'PRINT'PRINT" THIS IS A TEST PROGRAM. 
U ANSWER THESE QUESTIONS RIGHTYOU WILL GET ANOTHER ONE.":PRINT'PRINT" 
NSWER WRONG, THE CORRECT ANSWER WILL BE GIVEN." PRINT 

35 PRINT" IF YOU SPELL THE ANSWER WRONG, IT WILL BE WRONG." 

40 PRINT HINPUT " ARE YOI! READY FOR THE TEST TOBEGIN";RR£ 

42 IF LEFTSCRR£,12»"Y" THEN ?0 

4*5 CLS:PRINTG236,"MWHY NOT?"' FOR X=1 TO 500! МЕХТ!С0Т030 
Ee ee OEE HOW MANY QUESTIONS DO YOU 
100 N10 

119 ' 
120 
238 
240 
350 
360 
37A 
Эва 
402 
410 
420 
430 
440 
450 
460 
470 


IF YO 
IF YOU A 


WANT TO TRY"JN 


RESTORE 

IF Сем THEN 550 
СеСе1 

CLS' PRINT 
PRIHT"QUESTION 4";C 
PRINTSTRING$C12,"-") 
PRINT'PRINT 
XeRND(C Y? 

IF S(xX2=1 THEN 400 
SCX al 

FOR Q*91TOX 

RERD Q$,R$ 

NEXT Q 

PRINTQ# 

INPUT R$ 


бФссыттмиись Ou DOPE 4%% 






TIRED OF WAITING FOR SOFTWARE DELIVERY? 


WE SHIP FROM STOCK! 


ж>сппск SE 


THOSE ROMS! 











MONITOR TAPE: A cassette tape which 





DEVELOPMENT 
SYSTEM 

































SOURCE GENERATOR: This package is a 


































aliQws you to: 
dicassembier which runs on the color 
computer and enable you to generate БЛ Асма 
The Micro Works Software Development your Own есілсе listing 
System (SDSAOC ls а complete 6809 | Interpreter ROM. Also included is а) ° рле өлме о тотоу nn 


editor, essembier and monitor package 
contained in one Color Computer program 
раскі Vastly auperior to RAM-based 
assembiers/editors, the 50580С is non- 
volatile, meaning that if your application 
program bombs, it can't destroy your 
editor/assembier. Pius it iesves almost all 
of 16K or 32K RAM free for your program. 
Since all three programs, editor, assembler 
and monitor are co-resident, we eliminate 
tedious program loading when going back 
and forth from editing to assembly and 
debugging! 


documentation packages which gives 
useful ROM entry points, complete mem- 
ory map, VO hardware detalis and more. 
Disassembiar features include сговэ- 
referencing of variables and labels; output 
code which can be reassembied; output to 
an 80column printer, emali printer or 
screen, and а data table ares specification 
which defaults to the table boundaries in 
the interpreter ROM. A 16K system ts 
required for the use of this cassette. 


ВОС Diaezacrréter Price: $49.95 


e Download/upload data or programs to а 
hos! system 
. ы а жаз oo 
M 


* Send or receive RS-232 at up to 9800 
beud 












© investigate and activate features of your 
computer, such as hires graphics or 
machine-anguage music 

e Use your color computer as an intelli- 
gent peripheral for another computer, а 
Color display or а 6809 program develop 
ment too! 

The monitor has 19 commands in all, and is 

relocatable and re-entrant. 


CBUG Tape Price: $29.95 


MONITOR ROM: The same program ев 
above, supplied in 2716 EPROM. This 
allows you to use the entire RAM space. 
And you don't need to re-load the monitor 
each time you use it. The EPROM plugs 
into the Extended Basic ROM Socket or а 
modified ROMPACK. 


CBUG ROM Price: $39.95 


















































The powerful screen-oriented Editor 
features finds, changes, moves, copys and 
much more. All keys have convenient auto 
repeat (урәтшіс), and өлсе no line 
numbers are required, the full width of the 
screen may be used to generate well com 
mented code. 


6809 Assembly Lenguage Programming, 
by Lance Leventhal, contains the most 
comprehenaive reference materia! avail- 
able for programming your Color 
Computer. 


Price: $16.95 





























The Assembler feetures a// of the 
fotlowing: complete 6809 instruction set; 
complete 6800 set supported for cross- 
assembly, conditional! assembly; local jg 
labeis; assembly to cassette tape or to 
Memory; listing to screen or printer, and 
mnemonic error codes instead of numbers. 

















PARALLEL O! 


USE A PARALLEL PRINTER with your 
Color Computer! Adaptor box plugs into 
the serial port and allows use of 
Centronics/Radio Shack compatible 
printers with parallel interface. Assembled 
and tested. 


РІВОС Price: $89.95 





















32K RRM! 


MEMORY UPGRADE KITS: Consisting of 
4116 200ns. Integrated circuits, with 
instructions for installation. @K-16K КН 
Price. $39.95. 16K-32K КН (requires solder- 
ing experience) Price: $30.95 


THE INN [| G RIO) MasterCharge/Visa Accepted 
RO) California residents add 6% tax. 
WORKS Р.О. BOX 1110, DEL MAR, CA 92014 (71 4) 842-2400 


Tha versatile ABUG monitor is а compact 
version of CBUG, tailored for debugging 
programs generated by the Assembler and 
Editor. it features axamine/change о! 
Memory or registers, cassette load and 
save, breakpoints and more. 


50580С Price: $89.95 


















SOFTWARE REVIEW... 
S.E.C.S. 


Do you need SEX...00Ps, we mean 
S.E.C.8., the Screen Edit Control 
System from ORTRSOFT?T 


S.E.C.S. is really three 
Programa. in one, and, although only 
one of ‘these will work on a 4K 
system, its Probably those of you 
whe have 4K machines who need SEX 
Cthere we 90 a9ain!» the most. That 
is because S.E.C.& will Provide vou 
‘with an editor, which isn't 
available unless you have Extended 
Color Basic, which you can’t have if 
you don’t have 16K, which...means 
you need S.E.C.S. 


For anyone who has sPent hours 
and hours retyPin9 lines because 
there is no editor available to make 
that little correction at the end of 
a lon9 line, S.E.C.S. from MICROSOFT 
(829.95, 19519 Business Center Dr., 
Northridge, CA, 91324) is а bi9 
bonus. 


Because the editor is 
$creen-based, you don't have to 
learn a lot of different. commands, 
and the S.E.C.S. editor will do 
“things a lot of other editors won't 
== such as combine lines, relocate 
lines and the like. This 9ives a 
whole new dimension to editing in 
addition to the familiar adding, 
deleting or changing elements within 
lines, which S.E.C.S. also 
suPPorts. 


Moreover, the editing is 
$imPle. You use the right and left 
arrow keys to insert оғ delete 
ePaces and the break key to define a 
line. When you are throush, you 
$imPly ENTER the line and the edit 
is comP lete. 


Don't make the 
thinking S.E.C.S. із oni» for 4K 
systems. Its a 900d editor for 
those with more memory as well. 


mistake of 


If you have more than 4K, you 
Can use the other two ProSrams that 
are a Part of the S.E.C.S. (аре. 
One of them 9ives you access to 


hish-res SraPhics without Extended 
Color Basic, the other allows you to 
Generate a custom character set on 
the 9nraPhics screen. 


The @raPhics Jenerator wires 
Out your Extended Basic, but sives 
you back the hi9h-res caPabilities, 
Tf vou doubt this is Powerful, Just 
take a look at the 1090 by Steve 
Bjork. It will Give vou a taste of 
what CAN be done in high-res 
9nraPhics. 


. The SraPhics ProSram allows you 
to Plot lines on the screen, select 
backSround and line colors and use 
medium-high or full-hi9h res modes. 
The syntax is easy to follow and 
learn. 


The SOraPhics are  esPecially 
Sood with the character  9enerator, 
which is really а 900d Prosnram. 
Using the Senerator, you are 9iven s 
Character set, and the ability to 
modify it at will. This is done by 
your selection of the letter or 
symbol for modification and Pressing 
ENTER. 


A matrix will aPPean іп the 
црреғ right corner of the screen, 
with the cells that have been "set" 
colored in. There is а tiny cursor 
which you move through the matrix by 
Pressing the arrow keys. When you 
come to a cell you want to change 
Ceither from "on" to "off" or from 
"eff" to "оп" >), all you do is Press 
the sPace bar. Once you have 
designed the character, Just Press 
ENTER again, and the matrix 
disaPrears and your character із 
get. 


Because the individual 
characters are caPable of bein9 run 
tosether, you can create larse-size 
letters and symbols, too. We’ ve 
Gone a 9iant arrow and the Starship 
EnterPrise with almost no trouble at 
all. 


Each character set can be saved 
to taPe, so that you can work on one 
creation and then keeP it for future 
use. However, there does not seem 
to be a way for the taPed character 
sets to be used unless §.E.C.S. is 
resident in the COLOR ComPuter. 


CONTINUED 


тыс IN ONE 


More than one Program оп taPe 
ard both of them lon9? 


You. want to combine them but 


really don’t want to re-tyPe 
either? 
Oh ` well, maybe there's 


something else you can do. After 
all, it ыза hard enough writing both 
of those Programs in the first Place 
without having to re-tyPe one of 
them all over a9ain. 


You can combine both Programs! 
Here’s how: 


First of all, the combined 
total of the Pro9rams === Plus 300 
bytes --- should be less than the 
memory limit of your computer. 1€ 
things meet that condition, you 
CLORD your first ProSram as usual. 


A note here. It is best to 
have both Programs on taPe. .IF this 
routine crashes, you have not lost 
anything that way. If you write a 
proram and then want to aPPend 
something else to it, CSAVE the new 
Pno9ram First. This Procedure will 
save you a lot of rief Just in 
case. 


Once уол have a Program in 
memory, tyPe PRINT РЕЕКС 25), PEEK 
€26). Тһе COLOR Computer will Sive 
vou two numbers. Write these down. 


Next, tyPe PEEKC26). You will 
9et one number. 


If that number is O (zero? then 
tyPe POKE 25,реек(272-1:РОКЕ 
26,254. 


If that number is 1 then tyPe 
POKE 25,PEEKC27):POKE 26,255. 


If that number is more than 1, 
type POKE 23, PEEKC 27 )! POKE 
26, PEEKC 28 )-2 


If you try to LIST your Program 


in memory at this stase, you won't 
Set anything. ExcePt for the "PRINT 
МЕМ", your computer acts like there 
is no Program in memory. 


Now, CLORO the 
Program. 


second 


Finally, POKE the two numbers 
you wrote down at the start into 
addresses 25 and 26. Both Programs 
will now be resident in the comPuter 
at. the same time. 


One thing: The line numbers 
will NOT be changed. In other 
words, line 10 in Program 01 will 
show uP as line 10... and line 10 
іт Program 92 will ALSO show uP аз 
line 10. 


For this reason, it is 
sometimes best to CLOAD the second 
Program first, assisnine 16 high 
line wambers with RENUM. Then, 
CSRVE that ProSram, clear memory, 
ard load the first Program with the 
original line numbers intact. After 
you. 90 through this Procedure, you 
can RENUM the whole thing (IF you 
have Extended Color Basic? and all 
the GOTOs, GOSUBs and their lines 
wilt be changed correctly. 
Otherwise, those assignments can be 
messed uP by the RENIUM command. 


You can CLOAD as mans Prog9nrsms 
onto One (аре as you like usina this 
oPeration. The only constraint is 
having enough memory to hold 
everything. 


One use of this can be if you 
have a whole lot of short Programs 
== like the 9raPhics examples in the 
Телсіз documentation -- and want to 
have them in Just one Program £o you 
don’t have to CLORD back and forth. 
Just write ә. short menu after 
loading a bunch of these Programs in 
and you will have a 9raPhics display 
Program with a number of options. 


We’ve done this, and its a nice 
answer to the question from People 
who ask, "“what’s this thins do. 
anyways?" 


um «ке e o ee m ее 


RUIZ <Cont’d>| 


480 IF R$eR$£ THEN PRINT"CORRECT ! " :N19N1*1:PRINTG446, "" : INPUT" PRESS <ENTER> TO 
CONTINUE",R2$:GOTO110 

490 PRINT" INCORRECT ANSWER" ‘PRINT ‘PRINT" THE CORRECT ANSWER 15........ "R$:P 

RINTG451,"";:INPUT"PRESS XENTER? TO CONTINUE",R2$'GOTO110 

550 CLS'PRINT'PRINT"WELL, "MR$"..."'PRINT:PRINT"OUT OF"N" QUESTIONS, YOU 
RNSWERED"N1" RIGHT.":PeCN1ZNOX100:PRINT:PRINTUSING" THAT’S ###% RIGHT";P 

6oQ ' Жжжж Q&R'S GO HERE Жжжж 

€01 DATA CAPITAL OF KENTUCKY,FRANKFORT.WHAT STATE IS FRANKFORT THE CAPITAL 

OF , KENTUCKY 

602 DATA: YELLOWHAMMER STATE, ALABAMA 

603 DATA SPRINGFIELD IS THE CAPITAL ОҒ, ILLINOIS 

604 DATA THE OLD DOMINION STATE. VIRGINIA 

605 DATA CAPITAL OF TEXAS, AUSTIN 

686 DATA GREAT LAKE STATE. MICHIGAN 

607 DATR HOOSIER STATE. INDIANA 

899 DATA END 


| $S.E.C.9. cCont"cd» 
OFFICIAL STUFF | = | 
Once а character set is 
established, it can be easily set uP 





the RAINBOW on the O9nraPhics screen. You can 
Published by FALSOFT | also use а resular BASIC Prosram in 
$803 Timber Ridse Dr. conjunction with the @raPhics and 
Prospect, KY 40059 character 9eneratonr Pro9rams -~ and 
i you. can edit with the Screen Editor. 
Lawrence C. Falk -- Editor This із ә. Powerful caPability. 
the RAINBOW is intended for the | We think you will find S.E.C.S. 
Personal use and Pleasure of its a fine utility. 
subscribers and any reProdiction by 
any means is forbidden. Use of ---------- 
Pro9rams and information herein із 
for the Single end use оғ 
subscribers and any other use is 
Prohibited. 
YARB SOFTWARE 
TRS-80, Color ComPuter and 1169 FLORIDA ST. 
Extended Color Basic are trademarks IMPERIAL BEACH, CA 92032 


of Tandy Corp. 
LASER STAR & HELO BRTTLE.....$14.95 


ALL Prosrams herein are «ӘКВСООЕ.....................6/14.95 
distributed on an "as-is" basis. PSYCHIC APTITUDE TEST & 
without warranty. JARE BIORHYTHM. .cccccecceHl4.95 


JARB PRINTER UTILITY КІТ.....914.95 
Subscriptions to the RAINBOW are 

$12 Per year. Programs On 4у811%у data cassette 

with corb lete documentation. 
---------- COD orders accePted. For regular 

mails Please add $1 for shipping 
and hanclin9. California residents 
and 6% state sales tax. 


Call or write for free cata 109 
af available Programs. No collect 
calls Please. (714) 429-5516. 


You may order via ComPuServe # 
70445,312. Just leave in EMAIL 
You will be answered Promptly. 


“а REVIEW... - inside the cabinet and that you'll 


MICROWORKS RAM have more memery. And they deliver 
UPGRADES on that Promise. 
Although we talked last month 
If you still have 16K RAM, or, about freeing uP the 9raPhic screens 
even, 4K, it may be time to consider and all, the extra 16K of free 
an uP9rade to 32K. memory is a suPer bonus. We would 
rate it as the number one buy for 
And, if you’ve seen all the ads anyone at all serious about the 
offering uPgredes for so-and-so many COLOR ComPuter. And, while 32K 
collars, you're Probably not sure of won't solve all your Problems, it is 
Just what to choose. s answer to а reat many of 
m. 
In addition, there ARE those 
little notes tacked on to the end Oh, back to the soldering (for 
that say "soldering? required." And, ' the 32K uPerade), You need а low 
while, frankly, уои may be a whiz at heat soldering iron -~ not a Әуе -- 
anftyware, hardware 12 something and you should be careful of static 
else. Besides, once you dip inside, electricity when handling the КАМ 
the COLOR ComPuter’s silver cabinet. chips The MICROWORKS suPPlies. 
you'll set little sympathy at any Because the soldering is a bit 
Radio Shack rePsair center. intricate, you need to be sure of 
your soldering ability. But, if you 
Right? Riaht. are not sure, its а sile Job that 
anvone in an electronics shoP will 
One uP9rsde is available from be willing to do for you 
The MICROWORKS, P.O. Box 1110, Del Jnexpensively. A check with several 
Mar, CA, 92014 for $39.99. That readers found the charges ranging 
Price will allow you to uPSrade from from £18 to $22.50. 
4K to 16K or 16K to 32K. If уоу 
want to 90 from 4K to 32K, order In short, the lack of soldering 
both kits. ability should not be a roadblock to 
Purchasing this  uPerade. And the 
We can tell you first of all benefits are really something 
thet this uP9rade works perfectly else. 
and, second, that the solderina 
isn’t all THAT involved. In short, |) ДЛ7ч--------- 


The MICROWORKS Promises you. that you 
can make а simele modification 


the RAINEOW 3 
$803 TIMBER RIDGE DR. 
PROSPECT KY 40059 


Gentlemen: 
Please enter my subscriPtion for the RAINBOW for one year. 
My $12 is enclosed. 





NAME : 
ADDRESS! _ ——————————— 
CITY: STATE: ————— — (ІР! 








THANK YOU ! 


